﻿Public Class Form3

    Private Sub Form3_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim aList As New AssetVisionXAuto.FTs.FT_T_AV_ASSET
        Dim arow = aList.NewT_AV_ASSETRow
        Console.WriteLine(arow.PURCHASE_DATE)
        Console.WriteLine(arow.PURCHASE_DATE = XL.Common.CommDecl.NULL_DATE)

    End Sub
End Class